home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 24 / Amiga Format AFCD24 (Feb 1998, Issue 108).iso / -seriously_amiga- / shareware / programming / other / kaliosisquantrum / morb / chipdats.s < prev    next >
Text File  |  1998-01-12  |  4KB  |  293 lines
  1. *
  2. * CdBSian Obviously Universal & Interactive Nonsense (COUIN)
  3. * (Absurdité CdBSienne Manifestement Universelle et Interactive)
  4. * ©1997-1998, CdBS Software (MORB)
  5. * Chip datas
  6. * $Id: ChipDats.s 0.7 1997/09/11 12:56:12 MORB Exp MORB $
  7. *
  8.  
  9.      section   gna,data_c
  10.  
  11. ;fs "Game Copper lists"
  12. WrapDat:
  13.      ds.l      2+1
  14.      comove    $20,bplcon3
  15. Wcol1:
  16.      ;cocol     $500,0
  17.      conop
  18. WBpPtrs:
  19.      ds.l      2*NbPlanes
  20.      comove    0,copjmp2
  21.  
  22. WrapDat2:
  23.      ds.l      2+1
  24.      comove    $20,bplcon3
  25.      ;cocol     $005,0
  26. Wcol2:
  27.      conop
  28. WBpPtrs2:
  29.      ds.l      2*NbPlanes
  30.      comove    0,copjmp2
  31.  
  32. cl11dat:
  33.      conop
  34.      conop
  35.      cocol     $f00,0
  36.      conop
  37.      conop
  38.      conop
  39.  
  40.      conop
  41.      cowait    $38,$2a
  42.      cocol     $f0,0
  43.      conop
  44.      conop
  45.      conop
  46.  
  47.      conop
  48.      cowait    $38,$2b
  49.      cocol     $f,0
  50.      conop
  51.      conop
  52.      conop
  53.  
  54.      conop
  55.      cowait    $38,$2c
  56.      cocol     $f00,0
  57.      conop
  58.      conop
  59.      conop
  60.  
  61.      conop
  62.      cowait    $38,$2d
  63.      cocol     $f0,0
  64.      conop
  65.      conop
  66.      conop
  67.  
  68.      conop
  69.      cowait    $38,$2e
  70.      cocol     $f,0
  71.      conop
  72.      conop
  73.      conop
  74.  
  75.      conop
  76.      cowait    $38,$2f
  77.      cocol     0,0
  78.      conop
  79.      conop
  80.      conop
  81.  
  82.      conop
  83.      cowait    $38,$30
  84.      conop
  85.      conop
  86.      conop
  87.      conop
  88.  
  89.      coend
  90.  
  91. cl21dat:
  92.      ds.l      2
  93.  
  94.      cocol     $ff0,0
  95.  
  96.      comove    0,copjmp2
  97.  
  98.  
  99. CopperList:
  100.      dc.w      bplcon0
  101. _GameBplCon0:
  102.      dc.w      $0611
  103.  
  104.      ;comove    $5201,bplcon0       ; $0211
  105.      comove    $1020,bplcon3
  106.      comove    9,bplcon2
  107.      comove    $23,bplcon4
  108.  
  109.      comove    0,diwhigh
  110.      comove    $2991,diwstrt       ; Left 16 pixels R.I.P
  111.      comove    $29c1,diwstop
  112.  
  113.      comove    $30,ddfstrt
  114.      comove    $c8,ddfstop
  115.  
  116.      comove    Modulo,bpl1mod
  117.      comove    Modulo,bpl2mod
  118.  
  119.      comove    $c|1,fmode
  120.  
  121.     ;dc.w    $0180,$000,$0182,$0f2,$0184,$0c1,$0186,$081,$0188,$050
  122.     ;dc.w    $018a,$020,$018c,$ddd,$018e,$bbb,$0190,$888,$0192,$666
  123.     ;dc.w    $0194,$444,$0196,$f00,$0198,$c00,$019a,$a00,$019c,$700
  124.     ;dc.w    $019e,$000
  125.  
  126.      incbin    "Test.pal"
  127.  
  128.      cocol     $fff,0
  129.  
  130.      comove    $3020,bplcon3
  131.      cocol     0,1
  132.      cocol     $fff,2
  133.      comove    $1020,bplcon3
  134.  
  135.  
  136.      ;include   "Blks.pal"
  137.  
  138.      ;dc.w      $180
  139. ;cdbg:
  140.      ;dc.w      0
  141.  
  142.      cowait    0,$10
  143. GDwarvesPtrs:
  144.      ds.l      16
  145.  
  146. BpPtrs:
  147.      ds.l      2*NbPlanes
  148. BpPtrs2:
  149.      ds.l      2*NbPlanes
  150.  
  151.      dc.w      bplcon1
  152. _BplCon1:
  153.      dc.w      0
  154.  
  155.  
  156.      ;dc.w      $4d01,$fffe
  157.      ;dc.w      $9c,$8010
  158.      ;dc.w      $180,$f0f
  159.  
  160.      ;dc.w      $5081,$fffe
  161.  
  162.      ;dc.w      $84,$0007
  163.      ;dc.w      $86,$0000
  164.      ;dc.w      $8a,$0000
  165.  
  166.      ;cowait    0,$25
  167.      ;cocol     $f0,0
  168.      ;comove    $8010,intreq
  169.  
  170.  
  171. GameNml:
  172.      ds.l      4
  173.  
  174. ;Wrap2:
  175. ;         dc.w      $ffe1,$fffe
  176. ;
  177. ;Wrap:
  178. ;         dc.w      $4905,$fffe
  179. ;         dc.w      $180,$500
  180. ;WBpPtrs:
  181. ;         ds.l      2*NbPlanes
  182.  
  183.      coend
  184.  
  185. CL_Pal:
  186.      ds.b      2112
  187.      coend
  188. ;fe
  189. ;fs "Gui Copper lists"
  190. _GuiCList:
  191.      conop
  192.      conop
  193.      ds.l      1
  194.  
  195.      comove    GuiModulo,bpl1mod
  196.      comove    GuiModulo,bpl2mod
  197.      comove    $38,ddfstrt
  198.      comove    $c8,ddfstop
  199.      comove    $2991,diwstrt
  200.      comove    $29c1,diwstop
  201.      comove    $a201,bplcon0
  202.      comove    $4400,bplcon1
  203.      comove    $20,bplcon3
  204.      comove    $c|3,fmode
  205. _GuiBpPtrs:
  206.      ds.l      4
  207.  
  208.      cocol     $aaa,0
  209.      cocol     0,1
  210.      cocol     $fff,2
  211.      cocol     $f00,3
  212.  
  213. GuiSprPtrs:
  214.      ;ds.l      16
  215.  
  216.      comove    0,spr+8+sd_ctl
  217.      comove    0,spr+16+sd_ctl
  218.      comove    0,spr+24+sd_ctl
  219.      comove    0,spr+32+sd_ctl
  220.      comove    0,spr+40+sd_ctl
  221.      comove    0,spr+48+sd_ctl
  222.  
  223.      comove    0,spr+8+sd_pos
  224.      comove    0,spr+16+sd_pos
  225.      comove    0,spr+24+sd_pos
  226.      comove    0,spr+32+sd_pos
  227.      comove    0,spr+40+sd_pos
  228.      comove    0,spr+48+sd_pos
  229.  
  230. GuiNml:
  231.      ds.l      5
  232.  
  233. _GuiSelCList:
  234.      conop
  235.      conop
  236.      ds.l      1
  237.  
  238.      comove    GuiSelModulo,bpl1mod
  239.      comove    GuiSelModulo,bpl2mod
  240.      comove    $40,ddfstrt
  241.      comove    $b8,ddfstop
  242.      comove    $2991,diwstrt
  243.      comove    $29c1,diwstop
  244.      comove    $4201,bplcon0
  245.      comove    $4400,bplcon1
  246.      comove    $c|3,fmode
  247.  
  248. _GuiSelBpPtrs:
  249.      ds.l      2*NbPlanes
  250.  
  251.      ;include   "blks.pal"
  252.      incbin    "Test.pal"
  253.  
  254.  
  255. GuiSelNml:
  256.      ds.l      5
  257.  
  258. ;fe
  259.  
  260.      cnop      0,8
  261. _EmptyGardenDwarf:
  262.      ds.l      2*4
  263. _MouseGardenDwarfDat:
  264.      incbin    "MousePointer.bin"
  265.  
  266. _BackDats:
  267.      incbin    "Back.bin"
  268. _BackDats1:
  269.      incbin    "Back1.bin"
  270. _BackDats2:
  271.      incbin    "Back2.bin"
  272. _BackDats3:
  273.      incbin    "Back3.bin"
  274.  
  275. TestSprBm:
  276.      ds.b      4*33*4
  277. TestSprMsk:
  278.      dcb.b     4*33*4,$ff
  279.  
  280. TestSpr2Bm:
  281.      incbin    "TestSpr2.bin"
  282. TestSpr2Msk:
  283.      incbin    "TestSpr2.msk"
  284.  
  285.      section   gni,data
  286.  
  287. Plf1Tiles:
  288.      incbin    "Plf1Tiles.bin"
  289.  
  290. Plf2Tiles:
  291.      incbin    "Plf2Tiles.bin"
  292.      even
  293.